extern int dortqr_(integer *nz, integer *n, integer *nblock, doublereal *z__, doublereal *b);
/*:ref: dnrm2_ 7 3 4 7 4 */
/*:ref: ddot_ 7 5 4 7 4 7 4 */
/*:ref: daxpy_ 14 6 4 7 7 4 7 4 */
/*:ref: dscal_ 14 4 4 7 7 4 */
